home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1995 April / macformat-023.iso / Reader's Corner / Reader's Contibutions / Modified / FrEQuency data / 01829.ls < prev    next >
Encoding:
Text File  |  1995-01-19  |  882 b   |  34 lines
  1. on exitFrame
  2.   global frameseeker
  3.   if the lastClick > (70 * 60) then
  4.     silence()
  5.     mayhem()
  6.     set frameseeker to random(1000)
  7.     go(frameseeker + 2000)
  8.     set the movieTime of sprite 38 to 0
  9.     set the movieRate of sprite 38 to 1
  10.     play frame "randoma"
  11.   end if
  12.   if (the lastClick > (60 * 60)) and (the movieRate of sprite 37 = 0) then
  13.     set the movieRate of sprite 37 to 1
  14.     set the movieTime of sprite 38 to 0
  15.     set the movieRate of sprite 38 to 1
  16.     play frame "randoma"
  17.   else
  18.     silence()
  19.     mayhem()
  20.     set frameseeker to random(1000)
  21.     go(frameseeker + 2000)
  22.     set the movieTime of sprite 38 to 0
  23.     set the movieRate of sprite 38 to 1
  24.     play frame "randoma"
  25.   end if
  26.   if the lastClick > (10 * 60) then
  27.     go("tex2a")
  28.   else
  29.     set the movieTime of sprite 38 to 0
  30.     set the movieRate of sprite 38 to 1
  31.     play frame "randoma"
  32.   end if
  33. end
  34.